home *** CD-ROM | disk | FTP | other *** search
/ Disc Station 1 (Korea) / Disc Station Vol 1 (Korea).ISO / menu / startup.mct < prev    next >
Text File  |  1997-02-03  |  18KB  |  1,146 lines

  1. ;
  2.  
  3. ;
  4. ;
  5. ;
  6. ;
  7. ;
  8.  
  9. ;
  10. ;
  11. ;
  12. ;
  13. ;
  14.  
  15. @Effect 20, 245, 8
  16. @sndload DSmenu.mlk
  17. $snd = 0
  18. @snd $snd
  19. @pcmload DSmenu.wlk
  20.  
  21. @INSTgrp    popup12, (20, 15), 170    ;
  22. @INSTmater    mater12, 34, 3, 234        ;
  23. @INSTmaterSet    (2, 20)                ;
  24. @INSTchr    puyo12, 8, 7, 226, 228    ;
  25. @INSTchrSet    0, 3, 0, 2, 1, 3, 4, 2, 1    ;
  26. @INSTchrSet    1, 3, 0, 2, 1, 3, 4, 2, 1    ;
  27. @INSTmess    instmes, (0, 1), 40, 4, 167, 167    ;
  28. @INSTmessSet    0, 12, 0, 2            ;
  29. @INSTmessSet    1, 12, 1, 3            ;
  30. @INSTmessSet    2, 12, 4, 6            ;
  31. @INSTmessSet    3, 12, 5, 7            ;
  32. @INSTmessSet    4, 12, 8, 10        ;
  33. @INSTmessSet    5, 12, 9, 11        ;
  34. @INSTmessSet    6, 12, 12, 14        ;
  35. @INSTmessSet    7, 12, 13, 15        ;
  36. @INSTmessSet    8, 12, 16, 18        ;
  37. @INSTmessSet    9, 12, 17, 19        ;
  38.  
  39. @INSTmodeLoad mode12, (20, 2), 40, 4, 163, 163        ;
  40. @INSTmodeSet    0, 1, 0                ;
  41. @INSTmodeSet    1, 1, 1                ;
  42. @INSTmodeSet    2, 1, 3                ;
  43. @INSTmodeSet    3, 1, 2                ;
  44.  
  45. ;
  46. ;
  47. ;
  48. ;
  49. ;
  50.  
  51. @SYSinstDir DiscStation1                       ;
  52. @SYSCDvolume DS1                                       ;
  53. @SYSappName DiscStation1                       ;
  54. @SYSregKey DS1                                         ;
  55. @SYSuninst DSshell.exe                ;
  56. @SYSdrvType CD, HD                    ;
  57. @SYSmenuName ú─ú╙╕▐┤║íííí            ;
  58. @SYSmenuPath InstMenu                ;
  59. @SYSmenu    DSshell.exe                ;
  60. @SYSload sysico12, 10, 9, 219, 222    ;
  61.  
  62. @DRAWdisable                        ;
  63. ;
  64. @LOGOload logo12, 20, 8, 80, 82        ;
  65. @MENUload DSgame12, 16, 12, 20, 20    ;
  66. @Wall DSwall12 ,85                    ;
  67.  
  68. @GOSUB :sysiconinit                    ;
  69. @GOSUB :gameinit                    ;
  70. @DRAWenable                            ;
  71.  
  72. $start = 0
  73.  
  74. ;
  75. ;
  76. ;
  77. ;
  78. ;
  79.  
  80. :init
  81.  
  82. @DRAWdisable                        ;
  83.  
  84. @INSTmode $mode                        ;
  85.  
  86. @GOSUB :sysiconset                    ;
  87.  
  88. @GOSUB :Df3SetInst                ;
  89. @GOSUB :JHSetInst                    ;
  90. @GOSUB :SnpSetInst                    ;
  91. @GOSUB :GenSetInst                    ;
  92. @GOSUB :NPSetInst                    ;
  93. @GOSUB :MadoSetInst                    ;
  94. @GOSUB :MovieSetInst                ;
  95.  
  96. @IF $start != 0 :loopA
  97. @DRAWenable                            ;
  98. @Effect 20, 245, 10
  99. $start = 1
  100.  
  101. :loopA
  102.  
  103. @DRAWenable                            ;
  104.  
  105. :loop                                ;
  106. @ICONenable
  107. @Goto :loop                            ;
  108.  
  109. :inst
  110. @IF $mode == 0 :loop
  111. @pcm 0
  112. ;
  113. ;
  114. ;
  115. ;
  116. ;
  117. ;
  118. ;
  119. $mode = 0                            ;
  120. @GOTO :init
  121.  
  122. :store
  123. @IF $mode == 1 :loop
  124. @pcm 0
  125. $mode = 1                            ;
  126. @GOTO :init
  127.  
  128. :restore
  129. @IF $mode == 2 :loop
  130. @pcm 0
  131. $mode = 2                            ;
  132. @GOTO :init
  133.  
  134. :uninst
  135. @IF $mode == 3 :loop
  136. @pcm 0
  137. ;
  138. ;
  139. ;
  140. ;
  141. ;
  142. ;
  143. ;
  144. $mode = 3                            ;
  145. @GOTO :init
  146.  
  147. :exit
  148. @pcm 0
  149. @END                                ;
  150.  
  151.  
  152. ;
  153. ;
  154. ;
  155. ;
  156. ;
  157.  
  158. :sysiconinit
  159.  
  160. @MENUset exit(0), 1, 5, 3             ;
  161. @MENUlogoSet (26, 39), 24            ;
  162. @MENUset store(0), 1, 5, 0            ;
  163. @MENUset store(1), 1, 5, 5            ;
  164. @MENUlogoSet (26, 39), 27            ;
  165. @MENUset restore(0), 1, 5, 1        ;
  166. @MENUset restore(1), 1, 5, 6        ;
  167. @MENUlogoSet (26, 39), 28            ;
  168. @MENUset uninst(0), 1, 5, 2            ;
  169. @MENUset uninst(1), 1, 5, 7            ;
  170. @MENUlogoSet (26, 39), 26            ;
  171. @MENUset inst(0), 1, 5, 4            ;
  172. @MENUset inst(1), 1, 5, 9            ;
  173. @MENUlogoSet (26, 39), 25            ;
  174. @RET
  175.  
  176.  
  177. :sysiconset
  178.  
  179. @MENUput exit(0), (68, 51)            ;
  180. @MENUlogo exit, 0                    ;
  181. @MENUgoto exit, :exit                ;
  182.  
  183.  
  184. @IF $mode == 1 :store1
  185. @MENUput store(0), (36, 51)            ;
  186. @Goto :store2
  187. :store1
  188. @MENUput store(1), (36, 51)            ;
  189. :store2
  190. @MENUlogo store, 0                    ;
  191. @MENUgoto store, :store                ;
  192.  
  193. @IF $mode == 0 :inst1
  194. @MENUput inst(0), (4, 51)            ;
  195. @Goto :inst2
  196. :inst1
  197. @MENUput inst(1), (4, 51)            ;
  198. :inst2
  199. @MENUlogo inst, 0                    ;
  200. @MENUgoto inst, :inst                ;
  201.  
  202. @IF $mode == 2 :restore1
  203. @MENUput restore(0), (52, 51)        ;
  204. @Goto :restore2
  205. :restore1
  206. @MENUput restore(1), (52, 51)        ;
  207. :restore2
  208. @MENUlogo restore, 0                ;
  209. @MENUgoto restore, :restore            ;
  210.  
  211. @IF $mode == 3 :uninst1
  212. @MENUput uninst(0), (20, 51)        ;
  213. @Goto :uninst2
  214. :uninst1
  215. @MENUput uninst(1), (20, 51)        ;
  216. :uninst2
  217. @MENUlogo uninst, 0                    ;
  218. @MENUgoto uninst, :uninst            ;
  219.  
  220. @MENUdisp store, 1                    ;
  221. @MENUdisp restore, 1                    ;
  222. @MENUdisp inst, 1                    ;
  223. @MENUdisp uninst, 1                    ;
  224.  
  225. @RET
  226.  
  227. ;
  228. ;
  229. ;
  230. ;
  231. ;
  232. :gameinit
  233.  
  234. @MENUset Df3(0), 0, 2, 9, 10, 11, 10, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9     ;
  235. @MENUset Df3(1), 0, 2, 6, 7, 8, 7, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6      ;
  236. @MENUset Df3(2), 0, 2, 36, 37, 38, 37, 36, 36, 36, 36, 36, 36, 36, 36, 36, 36 ;
  237. @MENUclip Df3, 0, 0, 127, 95  ;
  238. @MENUlogoSet (26, 39), 31, 18, 14, 20, 21, 22             ;
  239. @GAMEname Df3, ╡Ñ║⌠╞≈╜║ú│              ;
  240. @GAMEexeFile Df3, DEVILF~1.exe            ;
  241. @GAMEexePath Df3, Df3         ;
  242. @GAMEsavePath Df3, SaveData                    ;
  243. @GAMEinstDir Df3, Df3            ; 
  244. @GAMECDdir Df3, Df3                    ;
  245.  
  246.  
  247. @MENUset Mado(0), 0, 2, 3, 4, 5, 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3     ;
  248. @MENUset Mado(1), 0, 2, 0, 1, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0    ;
  249. @MENUset Mado(2), 0, 2, 33, 34, 35, 34, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33    ;
  250. @MENUclip Mado, 0, 0, 127, 200
  251. @MENUlogoSet (26, 39), 31, 8, 9, 10, 11, 12    ;
  252. @GAMEname Mado, ╕╢╡╡└ⁿ▒Γí¡╛√╕┴┴°├ó▒Γ╕╗╜├╟Φí¡ ;
  253. @GAMEexeFile Mado, mado.exe                    ;
  254. @GAMEexePath Mado, mado
  255. @GAMEsavePath Mado, SaveData                    ;
  256. @GAMEinstDir Mado, mado
  257. @GAMECDdir Mado, Mado                                       ;
  258.  
  259. @MENUset Snp(0), 0, 3, 19, 20, 21, 22, 19, 19, 19, 19, 19, 19    ;
  260. @MENUset Snp(1), 0, 5, 18                        ;
  261. @MENUset Snp(2), 0, 3, 42, 43, 44, 45, 42, 42, 42, 42, 42, 42    ;
  262. @MENUclip Snp, 0, 20, 127, 70
  263. @MENUlogoSet (26, 39), 31, 5, 6, 7            ;
  264. @GAMEname Snp, ╛╓╟├╝╥╜║í¡╜║│¬└╠╞█í¡íííí        ;
  265. @GAMEexeFile Snp, Sniper.exe                    ;
  266. @GAMEexePath Snp, ╜║│¬└╠╞█íí                    ;
  267. @GAMEinstDir Snp, ╜║│¬└╠╞█íí                    ;
  268. @GAMECDdir Snp, Sniper                    ;
  269.  
  270. @MENUset JH(0), 0, 5, 23, 24, 25, 24              ;
  271. @MENUset JH(1), 0, 5, 49, 50, 51, 50                ;
  272. @MENUset JH(2), 0, 5, 46, 47, 48, 47            ;
  273. @MENUclip JH, 0, 0, 127, 95
  274. @MENUlogoSet (26, 39), 31, 0, 1, 2, 3, 4    ;
  275. @GAMEname JH, ú┬ú∩úφúΓúσú≥ííú╟ú╧ú╟ú╧        ;
  276. @GAMEexeFile JH, J_Hero.exe                    ;
  277. @GAMEexePath JH, Bomber                    ;
  278. @GAMEinstDir JH, Bomber                    ;
  279. @GAMECDdir JH, Bomber                    ;
  280.  
  281. @MENUset GEN(0), 0, 5, 15, 16, 17, 16              ;
  282. @MENUset GEN(1), 0, 5, 12, 13, 14, 13                ;
  283. @MENUset GEN(2), 0, 5, 39, 40, 41, 40                ;
  284. @MENUclip GEN, 0, 0, 127, 95
  285. @MENUlogoSet (26, 39), 31, 13, 14, 15, 16, 17    ;
  286. @GAMEname GEN, ╚»╝╝─Φ┴°▒╪                    ;
  287. @GAMEexeFile GEN, gensei.exe                    ;
  288. @GAMEexePath GEN, ╚»╝╝─Φ┴°▒╪                    ;
  289. @GAMEinstDir GEN, ╚»╝╝─Φ┴°▒╪                    ;
  290. @GAMECDdir GEN, Gense                    ;
  291.  
  292. @MENUset NP(0), 0, 3, 29, 30, 31, 32, 32, 32, 29, 30, 32, 29, 29, 29, 29, 29, 29, 29, 29, 29     ;
  293. @MENUset NP(1), 0, 3, 56, 57, 58, 56, 56, 56, 59, 57, 59, 56, 56, 56, 56, 56, 56, 56, 56, 56     ;
  294. @MENUset NP(2), 0, 3, 52, 53, 54, 52, 52, 52, 55, 53, 55, 52, 52, 52, 52, 52, 52, 52, 52, 52     ;
  295. @MENUclip NP, 0, 24, 127, 95
  296. @MENUlogoSet (26, 39), 31, 19, 29, 30            ;
  297. @GAMEname NP, ╞█┴±╗╤┐Σ                                  ;
  298. @GAMEexeFile NP, npuyo.exe                ;
  299. @GAMEexePath NP, ╞█┴±╗╤┐Σ                             ;
  300. @GAMEinstDir NP, ╞█┴±╗╤┐Σ                               ;
  301. @GAMECDdir NP, nazonazo                    ;
  302.  
  303.  
  304.  
  305. @MENUset Movie1(0), 0, 5, 26, 27, 28, 27             ;
  306. @MENUset Movie1(2), 0, 5, 49, 50, 51, 50             ;
  307. @MENUclip Movie1, 0, 16, 63, 47
  308. @MENUlogoSet (26, 39), 31, 20            ;
  309.  
  310. @MENUset Movie2(0), 0, 5, 59             ;
  311. @MENUclip Movie2, 0, 48, 63, 79
  312. @MENUlogoSet (26, 39), 31, 21            ;
  313.  
  314. @MENUset Movie5(0), 0, 5, 59             ;
  315. @MENUclip Movie5, 64, 0, 127, 31
  316. @MENUlogoSet (26, 39), 31, 14            ;
  317.  
  318. @MENUset Movie3(0), 0, 5, 59             ;
  319. @MENUclip Movie3, 64, 32, 127, 63
  320. @MENUlogoSet (26, 39), 31, 22            ;
  321.  
  322. @MENUset Movie4(0), 0, 5, 59             ;
  323. @MENUclip Movie4, 64, 64, 127, 95
  324. @MENUlogoSet (26, 39), 31, 23            ;
  325.  
  326. ;@RET
  327.  
  328.  
  329. ;
  330. ;
  331. ;
  332. ;
  333. ;
  334.  
  335. :MadoSetInst
  336. @INSTinfo Mado, $flag
  337.  
  338. @IF $flag != 0 :MadoAlready
  339. @IF $mode == 0 :madoinst
  340. @MENUlogo Mado, 0                    ;
  341. @MENUgoto Mado, :MadoNone            ;
  342. @MENUput Mado(2), (34, 8)            ;
  343. @GOTO :MadoNext
  344. :madoinst
  345. @MENUlogo Mado, 1                    ;
  346. @MENUgoto Mado, :MadoInst            ;
  347. @MENUput Mado(0), (34, 8)            ;
  348. @Goto :MadoNext
  349.  
  350. :MadoAlready
  351. @IF $mode == 0 :madoexec
  352. @IF $mode == 1 :madostore
  353. @IF $mode == 2 :madorestore
  354. @MENUlogo Mado, 2                    ;
  355. @MENUgoto Mado, :MadoUninst            ;
  356. @MENUput Mado(0), (34, 8)            ;
  357. @Goto :MadoNext
  358. :madoexec
  359. @MENUlogo Mado, 3                    ;
  360. @MENUgoto Mado, :MadoExec            ;
  361. @MENUput Mado(1), (34, 8)            ;
  362. @Goto :MadoNext
  363. :madostore
  364. @MENUlogo Mado, 4                    ;
  365. @MENUgoto Mado, :MadoStore            ;
  366. @MENUput Mado(0), (34, 8)            ;
  367. @Goto :MadoNext
  368. :madorestore
  369. @MENUlogo Mado, 5                    ;
  370. @MENUgoto Mado, :MadoRestore        ;
  371. @MENUput Mado(0), (34, 8)            ;
  372.  
  373. :MadoNext
  374.  
  375. @RET
  376.  
  377.  
  378. ;
  379. ;
  380. ;
  381. ;
  382. ;
  383.  
  384. :JHSetInst
  385. @INSTinfo JH, $flag
  386.  
  387. @IF